﻿Imports System.ComponentModel
Public Class OpenedWindowClass

    Implements INotifyPropertyChanged

    Public Event PropertyChanged( _
      ByVal sender As Object, _
      ByVal e As PropertyChangedEventArgs) _
      Implements INotifyPropertyChanged.PropertyChanged

    Protected Overridable Sub OnPropertyChanged(ByVal PropertyName As String)
        ' Raise the event, and make this procedure
        ' overridable, should someone want to inherit from
        ' this class and override this behavior:
        RaiseEvent PropertyChanged( _
          Me, New PropertyChangedEventArgs(PropertyName))
    End Sub

    Public Sub New(ByVal WindowID As String, ByVal WindowName As String, ByVal Windowtitle As String, ByVal WindowImage As String)
        ' Set the backing field so that
        ' you don't raise the PropertyChanged event
        ' when you first create the Customer.
        _windowID = WindowID
        _windowImage = WindowImage
        _windowName = WindowName
        _windowTitle = Windowtitle
    End Sub

    Private _windowName As String
    Private _windowID As String
    Private _windowTitle As String
    Private _windowImage As String
    Public Property WindowTitle() As String
        Get
            Return _windowTitle
        End Get
        Set(ByVal value As String)
            If _windowTitle <> value Then
                _windowTitle = value
                OnPropertyChanged("WindowTitle")
            End If
        End Set
    End Property

    Public Property WindowName() As String
        Get
            Return _windowName
        End Get
        Set(ByVal value As String)
            If _windowName <> value Then
                _windowName = value
                OnPropertyChanged("WindowName")
            End If
        End Set
    End Property

    Public Property WindowID() As String
        Get
            Return _windowID
        End Get
        Set(ByVal value As String)
            If _windowID <> value Then
                _windowID = value
                OnPropertyChanged("WindowID")
            End If
        End Set
    End Property

    Public Property WindowImage() As String
        Get
            Return _windowImage
        End Get
        Set(ByVal value As String)
            If _windowImage <> value Then
                _windowImage = value
                OnPropertyChanged("WindowImage")
            End If
        End Set
    End Property
End Class
